Top 10k strings from Animated Strip Poker (1985)(Knightsoft).z80
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /
Back to the directory listing
2 rcnt=rcnt+1 2 r$=" SHIRT": 2 r$=" JEANS": 2 pot=pot+call: 2 pot=pot+am: 2 pot=pot+am+call: 2 h(n)=p(n): 2 deal=deal+1 2 as=as+(c*sm): 1 yrow=yrow+1 1 yrow,xcol;" 1 yrow+y,xcol;" 1 win=(pas>cas)+(2 1 turn=(turn=0 1 suit=(cno>13 1 shuf,swap: 1 s(suit)=s(suit)+1 1 s$="TAKE IT OFF": 1 s$="STAND?" 1 s$="RAISE?" 1 s$="FOLD? " 1 s$="CALL? " 1 s$="BET? " 1 s$=" KNICKERS": 1 s$=" KNICKERS" 1 s$=" DRESS": 1 s$=" BRA": 1 r$="YOUR DRESS.": 1 r$="TO CHANGE?": 1 r$="LET'S PLAY": 1 r$="KEY TO DEAL": 1 r$="BY A THREAD": 1 r$=" YOUR POT": 1 r$=" YOUR BRA": 1 r$=" PLEASE!": 1 r$=" YOUR": 1 r$=" PANTS" 1 r$=" MY DRESS": 1 r$=" MY BRA": 1 r$=" FOR MY": 1 r$=" `"+ 1 r$=" STRIP": 1 r$=" PLAY": 1 r$=" PANTS": 1 r$=" MY BRA": 1 r$=" LINE" 1 r$=" AGAIN.": 1 r$=" HAND": 1 q$="YOU'VE LOST": 1 q$="WHICH CARDS": 1 q$="IS HANGING": 1 q$="I WON BACK": 1 q$="I RAISE `"+ 1 q$="HERE IS MY": 1 q$="ARE ON THE": 1 q$=" YOU PLAY": 1 q$=" PRESS ANY": 1 q$=" NEW DEAL": 1 q$=" LET'S PLAY": 1 q$=" KEEP YOUR": 1 q$=" I'LL LOSE": 1 q$=" I BET `"+ 1 q$=" FOR YOUR": 1 q$=" BACK YOUR": 1 q$=" YOUR POT": 1 q$=" NO MORE": 1 q$=" KEY TO": 1 q$=" I STAND": 1 q$=" I FOLD": 1 q$=" I DRAW "+ 1 q$=" I CALL": 1 q$=" HAVE TO": 1 q$=" BET YOUR": 1 q$=" YOUR": 1 q$=" O.K.": 1 q$=" MINDY": 1 q$=" I FOLD": 1 q$=" O.K.": 1 pot=pot+10 1 poker 3 1 pm=pm-call: 1 pm=pm-(am+call): 1 pm=pm+pot: 1 pm=pm+(pot/2 1 pcrem=pcrem-1 1 pcrem=pcrem+1 1 p$="YOU'VE WON": 1 p$="SORRY MINDY": 1 p$="RATS!": 1 p$="OH BOY!": 1 p$="MY KNICKERS": 1 p$="IF YOU WIN": 1 p$="GOSH!": 1 p$="DAMMIT!": 1 p$="CURSES!": 1 p$=" YOU DON'T": 1 p$=" THREADS ON": 1 p$=" THIS GAME,": 1 p$=" PRESS ANY": 1 p$=" MY DRESS": 1 p$=" I'LL PLAY": 1 p$=" YOU WON": 1 p$=" YOU WIN!": 1 p$=" YOU LOST": 1 p$=" YOU JUST": 1 p$=" A DRAW!!": 1 opt=opt-(3 1 opt=opt+(3 1 num=cno-13 1 n(num)=n(num)+1 1 h(n)=c(n): 1 deck=42745 1 deal=deck+1 1 deal=deal+2 1 crem=crem-1 1 crem=crem+1 1 cm=cm-call: 1 cm=cm-(am+call): 1 cm=cm+pot: 1 cm=cm+(pot/2 1 *(chs>phs)+(phs>chs) 1 *(cas>pas)):